www.gusucode.com > 云枫工作室企业网站源码 1 > 云枫工作室企业网站源码 1.0/云枫工作室企业网站源码(asp无限制版)1.0/web/admin/Upimagesb.asp
<% Server.ScriptTimeout=99999 %> <!--#include file="upload_5xsoft.inc" --> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head> <style> body { font-size:9pt } </style> <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <script> if (top.location==self.location){ top.location="login.asp" } </script> <% set upload=new upload_5xsoft set file=upload.file("sf_upfile") if file.fileSize<1 then response.write"<script language=javascript>alert('[ 上传系统提示 ]\n\n请选择文件!');history.back()</script>" response.end end if if file.fileSize<10 or file.fileSize>1000*102400 then response.write "错误:上传的图片大小超过了限制! <a href='javascript:history.go(-1)'>退回上一步</a>" response.end end if upfilename = split(file.FileName,".") upfileext = upfilename(ubound(upfilename)) if upfileext<>"jpg" and upfileext<>"jpeg" and upfileext<>"gif" and upfileext<>"JPG" and upfileext<>"JPEG" and upfileext<>"GIF" and upfileext<>"bmp"and upfileext<>"BMP"and upfileext<>"rar"and upfileext<>"RAR"and upfileext<>"ZIP"and upfileext<>"zip" then response.write "错误:上传的文件格式不对! <a href='javascript:history.go(-1)'>退回上一步</a>" response.end end if ufp=""&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&"."&upfilename(ubound(upfilename)) file.saveas Server.mappath("../upload/"&ufp) %> <script > parent.myform.Propicb.value='upload/<%=ufp%>' location.replace('Upimageb.asp') </script> <% set file=nothing set upload=nothing 'set my_conn = nothing 'set rs = nothing %> </body></html>